www.gusucode.com > BCB 写的一款可自定义风格的俄罗斯方块源码 > BCB 写的一款可自定义风格的俄罗斯方块源码/code/俄罗斯方块/Unit2.cpp

    //Download by http://www.NewXing.com
//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
//--------------------------------------------------------------------- 
#pragma resource "*.dfm"
TAboutBox *AboutBox;
//--------------------------------------------------------------------- 
__fastcall TAboutBox::TAboutBox(TComponent* AOwner)
	: TForm(AOwner)
{
}
//---------------------------------------------------------------------

void __fastcall TAboutBox::BitBtn1Click(TObject *Sender)
{
     Close();     
}
//---------------------------------------------------------------------------